home *** CD-ROM | disk | FTP | other *** search
/ Assassins - Ultimate CD Games Collection 4 / Assassins 4 (1999)(Weird Science).iso / misc / omega / source / fixstr.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-05-02  |  3.4 KB  |  147 lines
  1. /* This utility program is not part of the sources to Omega.
  2.    It was written by Nathan Glasser  nathan@brokaw.lcs.mit.edu    (internet)
  3.                         nathan@mit-eddie.uucp    (usenet).
  4.    As such, it is copyright by Nathan Glasser, 1987,1988,1989.
  5.    Please don't attempt to sell this program or take credit for it
  6.    yourself, and please don't remove this notice.
  7. */
  8.  
  9.  
  10. /* This program reads in a C source file and replaces all static strings
  11. with variable names defined above in the file, which are all declared
  12. to be far arrays. You don't need to run this for the unix version. */
  13.  
  14. /* This program does not know about comments, or \'s in front of "'s.
  15. Thus it can be broken. */
  16.  
  17. #include <stdio.h>
  18. #include <malloc.h>
  19.  
  20. #define TMPFILE "fixtmp.c"
  21.  
  22. int num_strings;
  23. char **string_list;
  24.  
  25. #define REALLOC_INCR 500
  26.  
  27.  
  28. main(argc,argv)
  29. int argc;
  30. char **argv;
  31. {
  32.     FILE *sourcefp,*destfp;
  33.  
  34.     if (argc != 2)
  35.     {
  36.         printf("Usage: %s <cfile>\n",argv[0]);
  37.     exit(1);
  38.     }
  39.  
  40.     if ((sourcefp = fopen(argv[1],"r")) == NULL ||
  41.       (destfp = fopen(TMPFILE,"w")) == NULL)
  42.     {
  43.         perror("Can't open a file (pass1)");
  44.     exit(1);
  45.     }
  46.  
  47.     printf("Scanning %s...",argv[1]);
  48.     fflush(stdout);
  49.     do_scan(sourcefp,destfp);
  50.     printf("Done\n");
  51.  
  52.     fclose(sourcefp);
  53.     fclose(destfp);
  54.  
  55.     if ((sourcefp = fopen(TMPFILE,"r")) == NULL ||
  56.       (destfp = fopen(argv[1],"w")) == NULL)
  57.     {
  58.         perror("Can't open a file (pass2)");
  59.     exit(1);
  60.     }
  61.  
  62.     printf("Writing new %s...",argv[1]);
  63.     fflush(stdout);
  64.     do_output(sourcefp,destfp);
  65.     printf("Done\n");
  66.     remove(TMPFILE);
  67.     exit(0);
  68. }
  69.  
  70. char include[] = "#include";
  71. #define include_size (sizeof(include) - 1)
  72.  
  73. do_scan(sourcefp,destfp)
  74. FILE *sourcefp,*destfp;
  75. {
  76.     int max_strings;
  77.     int ch,last_ch = EOF;
  78.     char temp_string[128],*temp;
  79.  
  80.     /* Vars for figuring out about #include's */
  81.     int pos = 0,include_flag = 0,include_tmp = 1;
  82.  
  83.     string_list = (char **)malloc((max_strings = REALLOC_INCR) *
  84.       sizeof(char *));
  85.  
  86.     while ((ch = getc(sourcefp)) != EOF)
  87.     {
  88.         switch (ch)
  89.     {
  90.         case '\n':
  91.             putc(ch,destfp);
  92.         pos = include_flag = 0;
  93.         include_tmp = 1;
  94.         break;
  95.         case '"':
  96.             if (!include_flag && last_ch != '\'')
  97.         {
  98.             /* Start of a string */
  99.             for (temp = temp_string; (*temp = getc(sourcefp)) != '"';
  100.               temp++);
  101.             *temp = '\0';
  102.             strcpy((string_list[num_strings] =
  103.               (char *)malloc(temp - temp_string + 1)),temp_string);
  104.             fprintf(destfp,"_str_%d",num_strings);
  105.             if (++num_strings == max_strings)
  106.                 string_list = (char **)realloc(string_list,
  107.               (max_strings += REALLOC_INCR) * sizeof(char *));
  108.             include_tmp = 0;
  109.             break;
  110.         }
  111.         default:
  112.             if (include_tmp)
  113.         {
  114.             if ((include_tmp = ch == include[pos++]) &&
  115.               pos == include_size)
  116.             {
  117.                 include_flag = 1;
  118.             include_tmp = 0;
  119.             }
  120.         }
  121.         putc(ch,destfp);
  122.         break;
  123.     }
  124.     last_ch = ch;
  125.     }
  126. }
  127.  
  128. do_output(sourcefp,destfp)
  129. FILE *sourcefp,*destfp;
  130. {
  131.     char buf[1024];
  132.     int i;
  133.  
  134.     fprintf(destfp,"/* These static strings have been moved here to */\n");
  135.     fprintf(destfp,"/* declare them as far and avoid having too much */\n");
  136.     fprintf(destfp,"/* initialized memory in the CONST segment. */\n\n");
  137.  
  138.     for (i = 0; i < num_strings; i++)
  139.         fprintf(destfp,"static char far _str_%d[] = \"%s\";\n",
  140.       i,string_list[i]);
  141.  
  142.     putc('\n',destfp);
  143.  
  144.     while (i = fread(buf,1,sizeof(buf),sourcefp))
  145.         fwrite(buf,i,1,destfp);
  146. }
  147.